Top 10k strings from Gehen Sie in das Gefangnis (1984)(Wicosoft)(de)[aka Go to Jail].tap in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [TAP] /
Back to the directory listing
4 g,k;" ZIEHE "; 3 X$(SN+Y)="S" 3 V(R)=V(R)-50 3 V(R)=V(R)+100 3 S)=" ": 3 MOVE=MOVE+40 3 >>>>>>>>>>>> 2 z,O;"Irgend ein anderer Platz? ";y$ 2 z,O;" UND WIEVIEL BEZAHLST DU?", 2 g,y;"ZAHLE $50" 2 g,k;" ZIEHE "; 2 g,g;"ZIEHE"; 2 f,k;"$50 EIN" 2 f,k;"$100 EIN" 2 V(R)=V(R)-100 2 V(R)=V(R)+50 2 V(R)=V(R)+200 2 TPRICE=TPRICE+PRICE 2 SITE=SITE+MOVE 2 PRICE=S/12 2 MONEY=S/12 2 GEMEIN. FELD 2 DEAL2=DEAL1: 2 A$(f,A+f)="0" 2 A$(U,Y+C)=SN 2 A$(U,S-n): 2 A$(U,C)=ZX 2 ;"GEHEN SIE IN DAS GEFANGNIS" 2 ));"S GRUNDSTUCK NUMMER "; 2 "," "," 1 z,o;" DU HAST HIER SCHON EIN HOTEL!! ": 1 z,O;"kann nicht tauschen, da bebaut. ": 1 z,O;"Nein Danke, ich biete nicht mit!": 1 z,O;"Jedes Haus kostet $";PRICE;".5=1 HOTEL": 1 z,O;" DAS IST NICHT DEIN GRUNDSTUCK! ": 1 y;"EREIGNIS"; 1 xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxppppppppppppppppxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxWppppppppppppVppppppppppppVpppppWppppppppppppVppppppppppppVpppppWppppppppppppVppppppppppppVpppppWrrrrrrrrrrrrVrrrrrrrrrrrrVrrrrrW<<<<<<<<<<<<V<<<<<<<<<<<<V<<<<<WrrrrrrrrrrrrVrrrrrrrrrrrrVrrrrrW222222222222V222222222222V22222WppppppppppppVppppppppppppVpppppWrrrrrrrrrrrrVrrrrrrrrrrrrVrrrrrxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 1 w,O;DEAL1;")";P$(DEAL1,m 1 w,O;"PRESS ENTER UM GRUPPEN ZU LISTEN" 1 w,O;"Moechtest du das kaufen? ";Y$ 1 w,O;"ENTER das hoechste Angebot", 1 w,O;"DAS PROGRAM IST GESPEICHERT.": 1 w,O;"1)";P$(Y,m 1 v,o;"~ZU VERKAUF~ an den hoechst Bie-tenden. Presse die Zahl diesesSpielers oder ~0~= Keine Bieter." 1 v,o;"Zum Verkauf."'"Preis $";PRICE 1 v,o,,,,,,,,: 1 v,O;"NUR ZUM BESUCH.", 1 v,O;"FREI PARKEN.", 1 v,O;" Zahle $200 Einkommensteuer.", 1 v,O;" Zahle $100 Zusatzsteuer.", 1 v,O,,,,,,,,,, 1 s Grundstuecke sind wiederim Besitz der Bank und sind freizur Auktion."''' 1 r;" $";RENT;" zahlen.": 1 q,O;"Es ist eine komplette Gruppe.", 1 q,O;"DU HAST KEINE $10!": 1 q,O;" Du hast zum dritten mal einen Pasch geworfen.",: 1 price=price/g 1 price=price+price/k 1 price;" dafur!",: 1 m,O;"Wieviele spieler? 2 bis 5" 1 k;"]";A$(Y,B 1 k,k;" GEH INS "; 1 k,O;" ";HO;" HAUSER"'" ";HT;" HOTELS"'"KOSTET $";HO*40 1 k,O;" ";HO;" HAUSER"'" ";HT;" HOTELS"'"KOSTET $";HO*25 1 k+Y,Y;p$(R),,: 1 g,y;"ZAHLE $150" 1 g,y;"GEFANGENIS"; 1 g,y;" DEIN "; 1 g,k;"STRAFE"; 1 g,k;"GEFANGNIS" 1 g,g;"ZURUCK" 1 g,g;"ZAHLE"; 1 g,f;"ZIEHE"; 1 f,z;" "; 1 f,y;"GEBURTSTAG" 1 f,y;"FREI KARTE" 1 f,k;"RUCKE VOR" 1 f,k;"???????" 1 f,k;"$25 EIN" 1 f,k;"$200 EIN" 1 f,k;"$150 EIN" 1 f,k;"$10 EIN" 1 f,k;" ZURUCK " 1 f,k;" $20. " 1 f,k;" FACH " 1 f,g;"$20 EIN" 1 f,g;"$100 " 1 f,g;" FACH " 1 f,f;"$100" 1 a$(U,s-m): 1 a$(U,B+Y)=SET 1 a$(U,B)=ZX 1 ZUSATZSTEUER 1 ZIEHE VON JEDEM SPIELER $10 EIN."; 1 Z,O;A$(Y,S-11 1 Y;p$(R);" "'"Du musst $"; 1 Y;P$(ZX),,"Nur eine Minute-ich denke nach",: 1 Y;"Ich zahle jetzt eine Hyp. zuruck" 1 Y;"GEMEIN."; 1 Y;"ENTER die Nummer des Kaufers mitdem hoechsten Angebot.", 1 Y;"Du bist im Gefaengnis gelandet. Du musst einen Pasch werfen, um frei zu kommen.", 1 Y;"Dieses mal musst Du herauskommen": 1 Y;" AUKTION Presse A": 1 X$="0000000000" 1 X$(SN+Y)="H": 1 X$(SN+Y)="0": 1 X$(SN+Y)="0" 1 Willst Du sie benutzen? "; 1 Wert $50,Press ";a;" um zu verkaufen" 1 Wenn Du aus dem Gefaengnis frei-kommen willst, zahle $50.", 1 WENN DU UBER LOS KOMMST, ZIEHE $200 EIN.",, 1 W,O;" Presse Initial um zu wuerfeln. " 1 W,O;" Presse ENTER um fortzufahren", 1 V,O,,,,,,,,,, 1 V(ZX)=V(ZX)- 1 V(ZX)-MONEY1+MONEY<O 1 V(R)=V(R)-z 1 V(R)=V(R)-m: 1 V(R)=V(R)-RENT 1 V(R)=V(R)-HO*40 1 V(R)=V(R)-HO*25 1 V(R)=V(R)-H*PRICE 1 V(R)=V(R)-COST: 1 V(R)=V(R)-200 1 V(R)=V(R)-150 1 V(R)=V(R)+z 1 V(R)=V(R)+m: 1 V(R)=V(R)+m 1 V(R)=V(R)+COST: 1 V(R)=V(R)+25 1 V(R)=V(R)+150 1 V(R)=V(R)+ 1 V(R)<PRICE 1 V(R);" finden um Schulden zu tilgen." 1 V(R)+U(R)<O 1 V(R)+U(R)+50 1 V(R)'" finden,"'"um Deine Schulden zu zahlen."' 1 V(OWN)=V(OWN)- 1 V(OWN)=V(OWN)+U(R)+V(R) 1 V(OWN)=V(OWN)+RENT: 1 V(OWN)=V(OWN)+ 1 V(I)=V(I)-PRICE: 1 V(I)=V(I)+50 1 V(DEAL2)=V(DEAL2)- 1 V(DEAL2)=V(DEAL2)+MONEY: 1 V(DEAL1)=V(DEAL1)-MONEY+MONEY1 1 V(DEAL1)=V(DEAL1)-MONEY 1 V(DEAL1)=V(DEAL1)+MONEY-MONEY1 1 V(B)=V(B)- 1 V(A)=V(A)-m 1 UDG 1 U;P$(ZX);" Nein. Der Handelist nicht gut genug fur mich.", 1 U;P$(ZX);" In Ordnung. Ich akzeptiere den Handel.", 1 U;P$(R);" kann beginnen", 1 U;P$(R);" ist an der Reihe " 1 U;(P$(ZX,m 1 U;(P$(DEAL2,m 1 U;(P$(DEAL1,m 1 U(ZX)=U(ZX)+ 1 U(R)=U(R)-COST 1 U(R)=U(R)- 1 U(R)=U(R)+H*PRICE/k 1 U(R)=U(R)+ 1 U(OWN)=U(OWN)+ 1 U(I)=U(I)+ 1 U(DEAL2)=U(DEAL2)+ 1 U(DEAL1)=U(DEAL1)- 1 U(B)=U(B)+ 1 SITE=SITE-g: 1 SITE=SITE-40 1 SET=SET-Y: 1 S-g)="1111" 1 S-g)="0000" 1 S-f)=" ": 1 S-Y)=P$(OWN): 1 S-Y)=P$(I): 1 S-Y)=P$(DEAL2) 1 S);"Du hast $";V(R);" uebrig", 1 S);" belastet,Du erhalst$";A$(8 1 S);" Es kostet Dich$";COST 1 S$=A$(U,k) 1 RENT=RENT+(n* 1 RENT=RENT*k: 1 RENT=(D1+D2)*(m-6 1 PRICE>COST 1 PRICE=TPRICE+MONEY1 1 PRICE=COST 1 PAUSE=9250 1 P$(A,Y)=" " 1 P$(A)="Spectrum": 1 P 1 O,O;"BIETER/GELD." 1 MOVE=SITE-Y: 1 MOVE=MOVE-G: 1 MOVE=MOVE-40 1 MOVE=D1+D2 1 MONEY1=S/12 1 MACHE EINEN AUSFLUG NACH DEM W.-BAHNHOF. WENN DU UBER LOS KOMMSTZIEHE $200 EIN.",, 1 LVAL=10000 1 Kannst nicht tauschen, da bebaut" 1 K$(R)>SITE 1 K$(R)-SITE 1 J$="0000000000"( 1 J$(ZX)>"0" 1 J$(DEAL2)="!" 1 J$(DEAL1)="!" 1 INS GEFANG.! 1 Hypothek auf welches Grundstuck?" 1 Hat ";J$(A);" GEFANGNIS-FREI-KARTE": 1 Grundstuck Nummer "; 1 GEMEIN. FELD" 1 GEFANGNIS 1 FREI PARKEN 1 FRED F 1 END=END+(J$(A)="!"): 1 END=END+(J$(A)="!") 1 EINK. STEUER 1 Du kommst aus dem Gefangnis frei"'" 1 Du bist auf LOS. Ziehe $200 ein." 1 Dieser Besitz gehoert 1 DU KOMMST AUS DEM GEFANGNIS FREIDIESE KARTE MUSS BEHALTEN WERDENBIS SIE GEBRAUCHT ODER VERKAUFTWIRD",, 1 DU HAST KEINEN KOMPLETTEN SATZ.": 1 DU HAST IN EINEM KREUZWORTRATSELWETTBEWERB GEWONNEN.", 1 DU ERBST"; 1 DOUBLE=DOUBLE+Y 1 DEAL3=DEAL2: 1 DEAL1=DEAL3 1 DEAL1=DEAL2: 1 DEAL1=DEAL2 1 COST=Y+V(A) 1 COST=TPRICE+MONEY 1 COST<PRICE 1 CH=CH+Y-15 1 CC=CC+Y-15 1 C$(C,Y)=" " 1 C 1 BF B@BFB@F 1 BB~<@BB<~B 1 B+Y,k;C$(D1,B); 1 AUS LAGERVERKAUFEN ZIEHE $50 EIN"; 1 A=V(R)-PRICE 1 A$(f,S-f)="0" 1 A$(f,S+n)="0" 1 A$(f,B+n)="0" 1 A$(U,m-SET) 1 A$(U,X-m)= 1 A$(U,S-n+A)): 1 A$(U,S-m+A)=SN 1 A$(U,S-m): 1 A$(U,S-m))="0" 1 A$(U,S-M)+Y)="S": 1 A$(U,B+n); 1 A$(U,B+g)=n 1 A$(U,B+Y)-n); 1 A$(U,B)=ZX 1 A$(U,A-Y)=OWN 1 A$(U,A+R)= 1 A$(U,A)=SN 1 A$(U,A)=S$ 1 A$(U,A)=11 1 >>>>LOS<<<<< 1 <B~B~<B<~B 1 ;DEAL2;")";P$(DEAL2,m 1 ;A;")";C$(A);" ": 1 ;A$(Y,S-11 1 ;"SCHLUSS" 1 ;"J. H. Woodhead" 1 ;"Das hochste Angebot? $"; 1 ;"111111111111": 1 ;".",P$(I,m 1 ;"$";U(A): 1 ;" VERKAUFT "; 1 3 FELDER"; 1 0000000000S 1 ,y;"Du muss";"t" 1 ,q;" " 1 ,g;D1;" + ";D2 1 ,Y;"MIETE $";RENT;" ": 1 ,S-m))="0": 1 ,O;"YOU ALREADY HAVE A HOTEL HERE",: 1 ,O;"Du hast einen Pasch geworfen. Du hast noch einen Wurf.",: 1 ,O;"DU DRUCKTEST ~Z~ WILLST DU SPIELSPEICHERN? ";Y$, 1 ,O;"Anzahl der Spieler von 2 bis 5.Spielt der computer mit,ENTER ZXals name und gib ihm eine Figur."''' 1 ,B+Y)-n);A$(Y,B 1 ,A,"EREIGNISFELD",97 1 ,A,"EREIGNISFELD",445 1 ,A,"EREIGNISFELD",277 1 +P,O;"Presse ENTER als Start": 1 +A,O;P$(A, 1 +A,O;"Was ist Dein Name? " 1 +A,O;" ";P$(A,m 1 +A,M;C$(C); 1 )=P$(A,Y)+C$(C): 1 )="111111111111" 1 )=" "+P$(B): 1 );"$";V(A) 1 );" ich biete $"; 1 );" hat $";v(a);" in der Bank" 1 );" erwarb dieses fuer $";PRICE,: 1 );" PLATZ ";A$(Y,S-11 1 );" HAUSER & HOTELS", 1 )," "'"Nun waehle eine Zahl" 1 ));"S GRUNDSTUCK "; 1 ));" Welche Platznummer? "; 1 ));" Str. Nummer "; 1 (price-cost)+m;" mehr", 1 (V(A)<O);"$";V(A); 1 (PRICE*V(ZX)/(PRICE+100 1 (((((((((((( 1 '"Speichere wieder fur neues Spiel" 1 '"Deine Hypothekenwerte sind ge-ringer als Deine Schulden. Dumusst aus dem Spiel ausscheiden." 1 '" Es ist nur ein Spieler uebrig!" 1 #GEFANGNIS## 1 "WIEVIELE MOCHTEST DU KAUFEN?", 1 "UND WER NOCH?", 1 "Spiel fuer ";p;" Spieler." 1 "Moechtest Du bezahlen? "; 1 "Miete ";A$(f,B+f 1 "Ich wurde einen Satz verlieren! ": 1 "Ich brauche ungefahr $"; 1 "GEFANGNIS" 1 "Du musst ein Grundstuck belastenoder ein Grundstuck an einen an-deren Spieler verkaufen.", 1 "Du musst $"; 1 "Du hast schon ";HO, 1 "Du hast nur $";V(R);" in der Bank": 1 "Du hast nicht genug Geld um eszu kaufen, Du musst es den ande-ren Spielern anbieten.",: 1 "Die anderen Spieler konnen durchpressen von ~A~, gefolgt bei derNummer des Feldes, jedes derGrundstuecke von ";p$(r,m 1 "Dein Hypothekenwert und DeinBankvermoegen sind geringer alsDeine Schulden. Du bist aus demSpiel herausgeworfen!", 1 "BEREITE BITTE DEINE KASSETTE VOR": 1 "Als Maximum 9 Buchstaben, bitte."'P$(A): 1 ";P$(OWN,m 1 ")";P$(A,m 1 "$";V(R);" in der Bank.Welche Str."; 1 " ZUM VERKAUF": 1 ZAHLE EINE STRAFE VON $10 ODER NIMM EINE EREIGNISKARTE.", 1 ZAHLE AN DAS KRANKENHAUS", 1 WIR KONNEN JETZT WEITERMACHEN. 1 WER MOECHTE HANDELN?", 1 WENN DU UBER LOS KOMMST, ZIEHE $200 EIN.",, 1 UND WIEVIEL GELD MOCHTEST DU? 1 SCHULGELD "; 1 RUCKE VOR BIS ZUR SCHLOSSALLEE " 1 RUCKE VOR BIS ZUR SEESTRASSE. 1 RUCKE VOR BIS AUF LOS ", 1 RUCKE VOR BIS ZUM OPERNPLATZ. 1 PRESSE X FUR DIE GRUPPENLISTE. 1 PRESSE ENTER FUR SPIELFIGUREN " 1 NIMMST DU EREIGNISKATE? ";Y$, 1 NACH DER BADSTRASSE!", 1 MIETE UND ANLEIHEZINSEN FALLIG "; 1 LASSE ALLE HAUSER RENOVIEREN. ZAHLE JE HAUS $25, HOTEL $100", 1 GEFANGNIS-FREI-KARTE VERK. $50 " 1 EINKOMMENSTEUER-RUCKZAHLUNG.", 1 Du bist aus dem Gefaengis frei." 1 Das ist Eigentum der Bank. " 1 DU HAST LOS PASSIERT 1 DU HAST DEN 2. PREIS IN EINER SCHONHEITSKONKURRENZ GEWONNEN. "; 1 DU ERHALTST AUF VORZUGS-AKTIEN 7% DIVIDENDE ZIEHE $25 EIN.", 1 DIE JAHRESRENTE WIRD FALLIG.", 1 DIE BANK ZAHLT EINE DIVIDENDE.", 1 DEINE VERSICHERUNGSSUMME. $50 "; 1 DAS IST NICHT MEIN GRUNDSTUCK! " 1 DAS IST NICHT DEIN GRUNDSTUCK! " 1 BETRUNKEN IM DIENST", 1 BANKIRRTUM ZU DEINEN GUNSTEN "; 1 Aber es hat eine hypothek. " 1 AUTOMATA U.K. Ltd. 1983." 1 ARZT-KOSTEN. ZAHLE $50", 1 von derBank erwerben.",, 1 IRGENDWELCHE ANDEREN? " 1 DU WIRST ZU",,'" STRASSENAUSBESSERUNGSARBEITEN HERANGEZOGEN. ZAHLE $40 JE HAUS,$115 JE HOTEL.", 1 LOS>>>> BADSTRASSE >>>>>>>>>>>>TURMSTRASSE EINKOMMEN- SUDBAHNHOF CHAUSSEE- ???????????? ELISENSTR. POSTSTRASSE GEFANGNIS SEESTRASSE ELEKTRIZITAT HAFEN- NEUE STRASSEWESTBAHNHOF MUNCHNER >>>>>>>>>>>> WIENER BERLINER THEATER ???????????? MUSEUM- OPERNPLATZ NORDBAHNHOF LESSING- SCHILLER- WASSER-WERK GOETHE- GEHEN SIE RATHAUSPLATZHAUPTSTRASSE>>>>>>>>>>>> BAHNHOF- HAUPTBAHNHOF????????????PARKSTRASSE ZUSATZSTEUERSCHLOSSALLEE$$$$$$$$$$$$ GEMEINSCHAFT STEUER STRASSE EREIGNISFACH # # # # # # WERK STRASSE STRASSE GEMEINSCHAFT STRASSE STRASSE FREI PARKEN STRASSE EREIGNISFACH STRASSE STRASSE STRASSE STRASSE IN DAS GEMEINSCHAFT STRASSE EREIGNISFACH ZIEHEN SIE ZUM VERKAUF FACH ZUM VERKAUF ZU 1